Profile of (eval 294)[Sub/Quote.pm:3]

Filename	(eval 294)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 54 statements in 545µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
44	2	2	393µs	8.46ms	JSON::Schema::Modern::Document::_get_resource
1	1	1	7µs	16µs	JSON::Schema::Modern::Document::BEGIN@5.131
1	1	1	3µs	3µs	Method::Generate::Accessor::_Generated::BEGIN@10.132

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
3	1	0s			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
4					package JSON::Schema::Modern::Document;
5	2	27µs	2	25µs	# spent 16µs (7+9) within JSON::Schema::Modern::Document::BEGIN@5.131 which was called: # once (7µs+9µs) by Sub::Quote::_clean_eval at line 5 no warnings 'closure'; # spent 16µs making 1 call to JSON::Schema::Modern::Document::BEGIN@5.131 # spent 9µs making 1 call to warnings::unimport
6					# spent 8.46ms (393µs+8.07) within JSON::Schema::Modern::Document::_get_resource which was called 44 times, avg 192µs/call: # 36 times (315µs+7.20ms) by JSON::Schema::Modern::Document::__ANON__[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/JSON/Schema/Modern/Document.pm:135] at line 122 of JSON/Schema/Modern/Document.pm, avg 209µs/call # 8 times (78µs+872µs) by JSON::Schema::Modern::add_schema at line 188 of JSON/Schema/Modern.pm, avg 119µs/call sub _get_resource {
7					($_QUOTED,$_UNQUOTED) if 0;
8					# BEGIN quote_sub PRELUDE
9					package Method::Generate::Accessor::_Generated;
10					# spent 3µs within Method::Generate::Accessor::_Generated::BEGIN@10.132 which was called: # once (3µs+0s) by Sub::Quote::_clean_eval at line 15 BEGIN {
11	1	0s			$^H = 2018;
12	1	1µs			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
13	1	2µs			%^H = (
14					);
15	1	28µs	1	3µs	} # spent 3µs making 1 call to Method::Generate::Accessor::_Generated::BEGIN@10.132
16					# END quote_sub PRELUDE
17	44	482µs	132	8.07ms	shift->_assert_resource_index->${\Data::Perl::Collection::Hash::MooseLike->can("get")}(@_); } # spent 7.66ms making 44 calls to Data::Perl::Collection::Hash::MooseLike::get, avg 174µs/call # spent 278µs making 44 calls to JSON::Schema::Modern::Document::_assert_resource_index, avg 6µs/call # spent 132µs making 44 calls to UNIVERSAL::can, avg 3µs/call
18	1	1µs			$$_UNQUOTED = \&_get_resource;
19					}
20	1	3µs			1;
21
22					;